home *** CD-ROM | disk | FTP | other *** search
- object JournalMainForm: TJournalMainForm
- Left = 210
- Top = 109
- Width = 778
- Height = 571
- Caption = 'The Journal'
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- FormStyle = fsMDIForm
- Menu = JournalMainMenu
- Position = poScreenCenter
- ShowHint = True
- WindowMenu = WindowMenu
- OnClose = FormClose
- OnCreate = FormCreate
- OnResize = FormResize
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object MainStatusBar: TStatusBar
- Left = 0
- Top = 506
- Width = 770
- Height = 19
- Font.Color = clGray
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Panels = <
- item
- Width = 250
- end
- item
- Width = 50
- end
- item
- Alignment = taCenter
- Width = 32
- end
- item
- Width = 50
- end>
- ParentFont = False
- SimplePanel = False
- end
- object HiddenPanel: TPanel
- Left = 188
- Top = 84
- Width = 113
- Height = 29
- Caption = 'HiddenPanel'
- TabOrder = 1
- Visible = False
- end
- object TopDocks: TDocks
- Left = 0
- Top = 0
- Width = 770
- Height = 30
- BoundLines = [dpTop]
- Position = dpTop
- object FormatXToolBar: TXToolBar
- Left = 172
- Top = 2
- Width = 486
- Height = 28
- Caption = 'Format Toolbar'
- DockedTo = TopDocks
- DockLine = 0
- DockPos = 170
- OnDockChanged = FileXToolBarDockChanged
- object FontButton: TSpeedButton
- Left = 3
- Top = 3
- Width = 22
- Height = 22
- Hint = 'Font Dialog'
- Caption = 'A'
- Enabled = False
- Font.Color = clBlack
- Font.Height = -16
- Font.Name = 'Times New Roman'
- Font.Style = [fsBold, fsItalic]
- NumGlyphs = 2
- ParentFont = False
- OnClick = FormatFontClick
- end
- object FontBoldButton: TSpeedButton
- Left = 234
- Top = 3
- Width = 22
- Height = 22
- Hint = 'Bold'
- AllowAllUp = True
- GroupIndex = 1
- Caption = 'B'
- Enabled = False
- Font.Color = clBlack
- Font.Height = -15
- Font.Name = 'MS Serif'
- Font.Style = [fsBold]
- NumGlyphs = 2
- ParentFont = False
- OnClick = FontBoldButtonClick
- end
- object FontItalicButton: TSpeedButton
- Left = 256
- Top = 3
- Width = 22
- Height = 22
- Hint = 'Italic'
- AllowAllUp = True
- GroupIndex = 2
- Caption = 'I'
- Enabled = False
- Font.Color = clBlack
- Font.Height = -15
- Font.Name = 'MS Serif'
- Font.Style = [fsBold, fsItalic]
- ParentFont = False
- OnClick = FontItalicButtonClick
- end
- object FontUnderButton: TSpeedButton
- Left = 278
- Top = 3
- Width = 22
- Height = 22
- Hint = 'Underline'
- AllowAllUp = True
- GroupIndex = 3
- Caption = 'U'
- Enabled = False
- Font.Color = clBlack
- Font.Height = -15
- Font.Name = 'MS Serif'
- Font.Style = [fsBold, fsUnderline]
- ParentFont = False
- OnClick = FontUnderButtonClick
- end
- object FontStrikeButton: TSpeedButton
- Left = 300
- Top = 3
- Width = 22
- Height = 22
- Hint = 'Strikeout'
- AllowAllUp = True
- GroupIndex = 4
- Caption = 'S'
- Enabled = False
- Font.Color = clBlack
- Font.Height = -15
- Font.Name = 'MS Serif'
- Font.Style = [fsBold, fsStrikeOut]
- ParentFont = False
- OnClick = FontStrikeButtonClick
- end
- object FontToolPanel: TToolPanel
- Left = 28
- Top = 3
- Width = 203
- Height = 22
- BevelOuter = bvNone
- Enabled = False
- TabOrder = 0
- object FontCombo: TComboBox
- Left = 4
- Top = 2
- Width = 145
- Height = 21
- Hint = 'Font Face'
- TabStop = False
- Style = csDropDownList
- Enabled = False
- ItemHeight = 13
- Sorted = True
- TabOrder = 0
- OnChange = FontComboChange
- end
- object PointSizeCombo: TComboBox
- Left = 152
- Top = 2
- Width = 49
- Height = 21
- Hint = 'Font Size'
- TabStop = False
- Style = csDropDownList
- Enabled = False
- ItemHeight = 13
- Items.Strings = (
- '8'
- '9'
- '10'
- '11'
- '12'
- '14'
- '16'
- '18'
- '20'
- '22'
- '24'
- '26'
- '28'
- '36'
- '48'
- '72')
- TabOrder = 1
- OnChange = PointSizeComboChange
- end
- end
- object FormatToolPanel: TToolPanel
- Left = 325
- Top = 3
- Width = 158
- Height = 23
- BevelOuter = bvNone
- Enabled = False
- TabOrder = 1
- object AlignLeftButton: TSpeedButton
- Left = 2
- Top = 0
- Width = 22
- Height = 22
- Hint = 'Align Left'
- AllowAllUp = True
- GroupIndex = 5
- Enabled = False
- Glyph.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 0400000000008000000000000000000000001000000010000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3333333333333333333330000000000033333333333333333333300000000000
- 0003333333333333333330000000000033333333333333333333300000000000
- 0003333333333333333330000000000033333333333333333333300000000000
- 0003333333333333333330000000000033333333333333333333}
- Layout = blGlyphRight
- OnClick = AlignButtonClick
- end
- object AlignCenterButton: TSpeedButton
- Tag = 2
- Left = 23
- Top = 0
- Width = 22
- Height = 22
- Hint = 'Center'
- AllowAllUp = True
- GroupIndex = 5
- Enabled = False
- Glyph.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 0400000000008000000000000000000000001000000010000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3333333333333333333333330000000033333333333333333333300000000000
- 0003333333333333333333330000000033333333333333333333300000000000
- 0003333333333333333333330000000033333333333333333333300000000000
- 0003333333333333333333330000000033333333333333333333}
- Layout = blGlyphRight
- OnClick = AlignButtonClick
- end
- object AlignRightButton: TSpeedButton
- Tag = 1
- Left = 44
- Top = 0
- Width = 22
- Height = 22
- Hint = 'Align Right'
- AllowAllUp = True
- GroupIndex = 5
- Enabled = False
- Glyph.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 0400000000008000000000000000000000001000000010000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3333333333333333333333330000000000033333333333333333300000000000
- 0003333333333333333333330000000000033333333333333333300000000000
- 0003333333333333333333330000000000033333333333333333300000000000
- 0003333333333333333333330000000000033333333333333333}
- Layout = blGlyphRight
- OnClick = AlignButtonClick
- end
- object UnIndentButton: TSpeedButton
- Left = 70
- Top = 0
- Width = 22
- Height = 22
- Hint = 'Unindent'
- Enabled = False
- Glyph.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 0400000000008000000000000000000000001000000010000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3333300000000000000333333333333333333000000000000003333333333333
- 3333333433333333333333443330000003333444443000000333444444333333
- 3333344444300000000333443330000000033334333333333333333333333333
- 3333300000000000000333333333333333333000000000000003}
- OnClick = UnIndentButtonClick
- end
- object IndentButton: TSpeedButton
- Left = 91
- Top = 0
- Width = 22
- Height = 22
- Hint = 'Indent'
- Enabled = False
- Glyph.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 0400000000008000000000000000000000001000000010000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3333300000000000000333333333333333333000000000000003333333333333
- 3333334333333333333333443330000003334444433000000333444444333333
- 3333444443300000000333443330000000033343333333333333333333333333
- 3333300000000000000333333333333333333000000000000003}
- Layout = blGlyphRight
- OnClick = IndentButtonClick
- end
- object BulletButton: TSpeedButton
- Left = 112
- Top = 0
- Width = 22
- Height = 22
- Hint = 'Bullet Text'
- AllowAllUp = True
- GroupIndex = 6
- Enabled = False
- Glyph.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 0400000000008000000000000000000000001000000010000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3333333333333333333334443333333333333444300000000003344433333333
- 3333333333333333333333333333333333333444333333333333344430000000
- 0003344433333333333333333333333333333333333333333333344433333333
- 3333344430000000000334443333333333333333333333333333}
- OnClick = BulletButtonClick
- end
- object AutoHangButton: TSpeedButton
- Left = 132
- Top = 0
- Width = 22
- Height = 22
- Hint = 'Auto-Hang'
- AllowAllUp = True
- GroupIndex = 6
- Enabled = False
- Glyph.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 0400000000008000000000000000000000001000000010000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
- 0003333333333333333330000000000000033333333333333333333330000000
- 0003333330000000000333333333333333333333300000000003333330000000
- 0003333333333333333330000000000000033000000000000003333333333333
- 3333300000000000000333333333333333333000000000000003}
- OnClick = AutoHangButtonClick
- end
- end
- end
- object EditXToolBar: TXToolBar
- Left = 76
- Top = 2
- Width = 94
- Height = 28
- Hint = 'Edit Commands'
- Caption = 'Edit Toolbar'
- DockedTo = TopDocks
- DockLine = 0
- DockPos = 74
- OnDockChanged = FileXToolBarDockChanged
- OnVisibleChanged = EditXToolBarVisibleChanged
- object CutButton: TSpeedButton
- Left = 3
- Top = 3
- Width = 22
- Height = 22
- Hint = 'Cut'
- Enabled = False
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000130B0000130B00000000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3333333333333333FF3333333333333003333333333333377F33333333333307
- 733333FFF333337773333C003333307733333777FF333777FFFFC0CC03330770
- 000077777FF377777777C033C03077FFFFF077FF77F777FFFFF7CC00000F7777
- 777077777777777777773CCCCC00000000003777777777777777333330030FFF
- FFF03333F77F7F3FF3F7333C0C030F00F0F03337777F7F77373733C03C030FFF
- FFF03377F77F7F3F333733C03C030F0FFFF03377F7737F733FF733C000330FFF
- 0000337777F37F3F7777333CCC330F0F0FF0333777337F737F37333333330FFF
- 0F03333333337FFF7F7333333333000000333333333377777733}
- NumGlyphs = 2
- OnClick = CutButtonClick
- end
- object CopyButton: TSpeedButton
- Left = 25
- Top = 3
- Width = 22
- Height = 22
- Hint = 'Copy'
- Enabled = False
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000130B0000130B00000000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF003333330B7FFF
- FFB0333333777F3333773333330B7FFFFFB0333333777F3333773333330B7FFF
- FFB0333333777F3333773333330B7FFFFFB03FFFFF777FFFFF77000000000077
- 007077777777777777770FFFFFFFF00077B07F33333337FFFF770FFFFFFFF000
- 7BB07F3FF3FFF77FF7770F00F000F00090077F77377737777F770FFFFFFFF039
- 99337F3FFFF3F7F777FF0F0000F0F09999937F7777373777777F0FFFFFFFF999
- 99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339
- 99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999
- 93337FFFF7737777733300000033333333337777773333333333}
- NumGlyphs = 2
- OnClick = CopyButtonClick
- end
- object PasteButton: TSpeedButton
- Left = 47
- Top = 3
- Width = 22
- Height = 22
- Hint = 'Paste'
- Enabled = False
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000130B0000130B00000000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF003333330FFFFF
- FFF03333337F3FFFF3F73333330F0000F0F03333337F777737373333330FFFFF
- FFF033FFFF7FFF33FFF77000000007F00000377777777FF777770BBBBBBBB0F0
- FF037777777777F7F3730B77777BB0F0F0337777777777F7F7330B7FFFFFB0F0
- 0333777F333377F77F330B7FFFFFB0009333777F333377777FF30B7FFFFFB039
- 9933777F333377F777FF0B7FFFFFB0999993777F33337777777F0B7FFFFFB999
- 9999777F3333777777770B7FFFFFB0399933777FFFFF77F777F3070077007039
- 99337777777777F777F30B770077B039993377FFFFFF77F777330BB7007BB999
- 93337777FF777777733370000000073333333777777773333333}
- NumGlyphs = 2
- OnClick = PasteButtonClick
- end
- object UndoButton: TSpeedButton
- Left = 69
- Top = 3
- Width = 22
- Height = 22
- Hint = 'Undo'
- Enabled = False
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000130B0000130B00000000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
- 3333333777333777FF3333993333339993333377FF3333377FF3399993333339
- 993337777FF3333377F3393999333333993337F777FF333337FF993399933333
- 399377F3777FF333377F993339993333399377F33777FF33377F993333999333
- 399377F333777FF3377F993333399933399377F3333777FF377F993333339993
- 399377FF3333777FF7733993333339993933373FF3333777F7F3399933333399
- 99333773FF3333777733339993333339933333773FFFFFF77333333999999999
- 3333333777333777333333333999993333333333377777333333}
- NumGlyphs = 2
- OnClick = UndoButtonClick
- end
- end
- object FileXToolBar: TXToolBar
- Left = 2
- Top = 2
- Width = 72
- Height = 28
- Caption = 'File Toolbar'
- DockedTo = TopDocks
- DockLine = 0
- DockPos = 0
- OnDockChanged = FileXToolBarDockChanged
- OnVisibleChanged = FileXToolBarVisibleChanged
- object SaveButton: TSpeedButton
- Left = 3
- Top = 3
- Width = 22
- Height = 22
- Hint = 'Save Journal'
- Enabled = False
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000130B0000130B00000000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333330070
- 7700333333337777777733333333008088003333333377F73377333333330088
- 88003333333377FFFF7733333333000000003FFFFFFF77777777000000000000
- 000077777777777777770FFFFFFF0FFFFFF07F3333337F3333370FFFFFFF0FFF
- FFF07F3FF3FF7FFFFFF70F00F0080CCC9CC07F773773777777770FFFFFFFF039
- 99337F3FFFF3F7F777F30F0000F0F09999937F7777373777777F0FFFFFFFF999
- 99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339
- 99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999
- 93337FFFF7737777733300000033333333337777773333333333}
- NumGlyphs = 2
- OnClick = FileSaveJournalClick
- end
- object PrintButton: TSpeedButton
- Left = 25
- Top = 3
- Width = 22
- Height = 22
- Hint = 'Print'
- Enabled = False
- Glyph.Data = {
- 78010000424D7801000000000000760000002800000020000000100000000100
- 04000000000000000000120B0000120B00000000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
- 0003377777777777777308888888888888807F33333333333337088888888888
- 88807FFFFFFFFFFFFFF7000000000000000077777777777777770F8F8F8F8F8F
- 8F807F333333333333F708F8F8F8F8F8F9F07F333333333337370F8F8F8F8F8F
- 8F807FFFFFFFFFFFFFF7000000000000000077777777777777773330FFFFFFFF
- 03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
- 03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
- 33333337F3F37F3733333330F08F0F0333333337F7337F7333333330FFFF0033
- 33333337FFFF77333333333000000333333333377777733333330000}
- NumGlyphs = 2
- OnClick = PrintButtonClick
- end
- object SpellCheckButton: TSpeedButton
- Left = 47
- Top = 3
- Width = 22
- Height = 22
- Hint = 'Spell check'
- Enabled = False
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000010000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
- 5555555555FF5555555555555905555555555555577FF5555555555599905555
- 555555557777F5555555555599905555555555557777FF555555555999990555
- 5555555777777F5555555599999905555555557777777FF55555579905999055
- 55555777757777F5555579055559905555557775555777FF5555555555599905
- 555555555557777F555555CCC55C9905555555555555777FF5555C555C5C5990
- 5555555555555777FF55555CCC5CCC7905555555555555777FF555C5555C55C7
- 905555555555555777FF5C555C5C55C55990555555555555577755CCC55CCC55
- 5555555555555555555555555555555555555555555555555555}
- NumGlyphs = 2
- OnClick = JournalSpellCheckClick
- end
- end
- end
- object BottomDocks: TDocks
- Left = 0
- Top = 499
- Width = 770
- Height = 7
- BoundLines = [dpBottom]
- Position = dpBottom
- end
- object LeftDocks: TDocks
- Left = 0
- Top = 30
- Width = 7
- Height = 469
- BoundLines = [dpLeft]
- Position = dpLeft
- end
- object RightDocks: TDocks
- Left = 763
- Top = 30
- Width = 7
- Height = 469
- BoundLines = [dpRight]
- Position = dpRight
- end
- object JournalMainMenu: TMainMenu
- Left = 80
- Top = 84
- object FileMenu: TMenuItem
- Caption = '&File'
- ShortCut = 0
- object FileOpenJournal: TMenuItem
- Caption = '&Open Journal'
- ShortCut = 0
- OnClick = FileOpenJournalClick
- end
- object FileCloseJournal: TMenuItem
- Caption = '&Close Journal'
- Enabled = False
- ShortCut = 0
- OnClick = FileCloseJournalClick
- end
- object N4: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object FileMaintenance: TMenuItem
- Caption = '&Maintenance'
- ShortCut = 0
- object FileMaintRebuildIndexes: TMenuItem
- Caption = '&Rebuild Indexes'
- ShortCut = 0
- OnClick = FileMaintRebuildIndexesClick
- end
- object FileMaintCompactDatabase: TMenuItem
- Caption = '&Compact Database'
- ShortCut = 0
- OnClick = FileMaintCompactDatabaseClick
- end
- end
- object FileMinimizetoSystemTray: TMenuItem
- Caption = 'Minimize to System Tray'
- ShortCut = 0
- OnClick = FileMinimizetoSystemTrayClick
- end
- object N1: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object FileExit: TMenuItem
- Caption = 'E&xit'
- ShortCut = 0
- OnClick = FileExitClick
- end
- end
- object DatesMenu: TMenuItem
- Caption = '&Dates'
- Enabled = False
- GroupIndex = 3
- ShortCut = 0
- OnClick = DatesMenuClick
- object DatesReviewByDate: TMenuItem
- Caption = 'Review by &Date'
- ShortCut = 0
- OnClick = ReviewByDateClick
- end
- object DatesReviewByCategory: TMenuItem
- Caption = 'Review by &Category'
- ShortCut = 0
- OnClick = ReviewByCategoryClick
- end
- object N5: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object DatesNewDate: TMenuItem
- Caption = 'Add &New Date...'
- ShortCut = 0
- OnClick = DatesNewDateClick
- end
- object N6: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object DatesImport: TMenuItem
- Caption = '&Import...'
- ShortCut = 0
- OnClick = DatesImportClick
- end
- object DatesExport: TMenuItem
- Caption = '&Export...'
- ShortCut = 0
- OnClick = DatesExportClick
- end
- end
- object UserMenu: TMenuItem
- Caption = '&User'
- Enabled = False
- GroupIndex = 3
- ShortCut = 0
- OnClick = DatesMenuClick
- object UserEditCategories: TMenuItem
- Caption = '&Edit Categories...'
- ShortCut = 0
- OnClick = UserEditCategoriesClick
- end
- object UserChangePassword: TMenuItem
- Caption = '&Change Password...'
- ShortCut = 0
- OnClick = UserChangePasswordClick
- end
- object UserPreferences: TMenuItem
- Caption = '&Preferences...'
- ShortCut = 0
- OnClick = UserPreferencesClick
- end
- object N3: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object UserShowFileToolbar: TMenuItem
- Caption = 'Show File Toolbar'
- Enabled = False
- ShortCut = 0
- OnClick = UserShowFileToolbarClick
- end
- object UserShowEditToolbar: TMenuItem
- Caption = 'Show Edit Toolbar'
- Enabled = False
- ShortCut = 0
- OnClick = UserShowEditToolbarClick
- end
- object UserShowFormatToolbar: TMenuItem
- Caption = 'Show Format Toolbar'
- Enabled = False
- ShortCut = 0
- OnClick = UserShowFormatToolbarClick
- end
- end
- object WindowMenu: TMenuItem
- Caption = '&Window'
- GroupIndex = 4
- ShortCut = 0
- object WindowCascade: TMenuItem
- Caption = '&Cascade'
- ShortCut = 0
- OnClick = WindowCascadeClick
- end
- object WindowTile: TMenuItem
- Caption = '&Tile'
- ShortCut = 0
- OnClick = WindowTileClick
- end
- object WindowArrangeIcons: TMenuItem
- Caption = '&Arrange Icons'
- ShortCut = 0
- OnClick = WindowArrangeIconsClick
- end
- end
- object HelpMenu: TMenuItem
- Caption = '&Help'
- GroupIndex = 5
- ShortCut = 0
- OnClick = HelpMenuClick
- object HelpTopics: TMenuItem
- Caption = '&Help Topics'
- ShortCut = 112
- OnClick = HelpTopicsClick
- end
- object N2: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object HelpAbout: TMenuItem
- Caption = '&About The Journal'
- ShortCut = 0
- OnClick = HelpAboutClick
- end
- object HelpRegisterDash: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object HelpRegister: TMenuItem
- Caption = '&Register The Journal'
- ShortCut = 0
- OnClick = HelpRegisterClick
- end
- end
- end
- object SaveTimer: TTimer
- Enabled = False
- OnTimer = SaveTimerTimer
- Left = 112
- Top = 84
- end
- object MainResolutionFix: TResolutionFix
- DesignRes = 96
- Left = 80
- Top = 116
- end
- object JournalTrayPopupMenu: TPopupMenu
- Left = 112
- Top = 148
- object TrayPopupRestore: TMenuItem
- Caption = '&Restore'
- Default = True
- ShortCut = 0
- OnClick = JournalTrayIconClick
- end
- object TrayPopupClose: TMenuItem
- Caption = '&Close'
- ShortCut = 0
- OnClick = FileExitClick
- end
- end
- object JournalSpellCheck: TSpellCheck
- FileName = 'ENGLISH.DCT'
- UserFileName = 'DEFAULT.UDT'
- UseAppDir = False
- MaxSuggest = 30
- DemandLoad = True
- CheckStyle = csRich
- SelBehavior = sbAvoid
- EndShowMessage = True
- EndMessage = 'Spell Check Complete'
- DialogCaption = 'Spell Check'
- StatusUserDict = dsEnabled
- StatusMainDict = dsEnabled
- SpecialChars = #39'.'
- MakeSuggestions = True
- CoveragesNorm = [c_2_transposed, c_1_extra, c_1_missing, c_1_wrong, c_2_transposed_3rd, c_2_extra, c_split_words]
- CoveragesCase = [c_2_transposed, c_1_extra, c_1_missing, c_1_wrong, c_2_transposed_3rd, c_2_extra, c_split_words]
- SuggestButton = False
- WaitForCompletion = False
- Left = 80
- Top = 180
- end
- object JournalTrayIcon: TTrayIcon
- Active = False
- Hint = 'The Journal'
- Icon.Data = {<image000.ico>}
- PopupMenu = JournalTrayPopupMenu
- OnClick = JournalTrayIconClick
- OnMinimize = JournalTrayIconMinimize
- OnRestore = JournalTrayIconRestore
- Left = 80
- Top = 148
- end
- end
-